data segment
	num db 31H,32H,33H
data ends

code segment
main proc far
	assume cs:code,ds:data,es:data

start:
	push  ds
	sub ax,ax
	push ax
	mov ax,data
	mov ds,ax
	mov es,ax
	
	mov cx,10
	lea si,num
	mov di,3
next:
	mov al,[si]
	mov [num+di],al
	mov al,[si+1]
	mov [num+di+1],al
	mov al,[si+2]
	mov [num+di+2],al
	add di,3
	loopnz next

	ret
main endp
code ends
	end start

